
program define mybstrpadjr2, eclass
         version 11
         bootstrap e(r2_a), reps(1000): reg `0'
         tempname b V
         mat `b' = e(b)
         mat `V' = e(V)
         mat colnames `b' = "Adjusted R-Squared"
         mat colnames `V' = "Adjusted R-Squared"
         mat rownames `V' = "Adjusted R-Squared"
         eret post `b' `V'
         eret local cmd myadjr2
end
